home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PsL Monthly 1999 June
/
PSL Volume 7 Number 6.iso
/
educa
/
win
/
lang_art
/
PPUNCH30.ZIP
/
DEMO.ZIP
/
PUNCH.EXE
/
0
/
RCDATA
/
TSCROLLF
/
TSCROLLF.txt
< prev
Wrap
Text File
|
1998-03-18
|
12KB
|
312 lines
object ScrollF: TScrollF
Left = 15
Top = 293
HorzScrollBar.Tracking = True
VertScrollBar.Tracking = True
BorderIcons = [biSystemMenu, biMinimize]
AutoScroll = False
Caption = 'ScrollF'
ClientHeight = 139
ClientWidth = 367
Color = 14737632
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIChild
Icon.Data = {<image000.ico>}
KeyPreview = True
Position = poDefault
Visible = True
OnActivate = FormActivate
OnClose = FormClose
OnCreate = FormCreate
OnKeyDown = FormKeyDown
OnKeyPress = FormKeyPress
OnResize = FormResize
PixelsPerInch = 96
TextHeight = 13
object ListBox1: TListBox
Left = 0
Top = 41
Width = 367
Height = 66
Align = alClient
Color = 14737632
ExtendedSelect = False
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ItemHeight = 16
ParentFont = False
Style = lbOwnerDrawVariable
TabOrder = 0
OnClick = ListBox1Click
OnDblClick = ListBox1DblClick
OnDragDrop = ListBox1DragDrop
OnDragOver = ListBox1DragOver
OnDrawItem = ListBox1DrawItem
OnMeasureItem = ListBox1MeasureItem
OnMouseUp = ListBox1MouseUp
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 367
Height = 41
Align = alTop
TabOrder = 1
Visible = False
object UndoB: TSpeedButton
Left = 148
Top = 0
Width = 33
Height = 41
Caption = '&Undo'
Enabled = False
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF003333330B7FFF
FFB0333333777F3333773333330B7FFFFFB0333333777F3333773333330B7FFF
FFB0333333777F3333773333330B7FFFFFB03FFFFF777FFFFF77000000000077
007077777777777777770FFFFFFFF00077B07F33333337FFFF770FFFFFFFF000
7BB07F3FF3FFF77FF7770F00F000F00090077F77377737777F770FFFFFFFF039
99337F3FFFF3F7F777FF0F0000F0F09999937F7777373777777F0FFFFFFFF999
99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
93337FFFF7737777733300000033333333337777773333333333}
Layout = blGlyphTop
NumGlyphs = 2
ParentShowHint = False
ShowHint = False
Visible = False
OnClick = UndoBClick
end
object AddB: TSpeedButton
Left = 0
Top = 0
Width = 33
Height = 41
Caption = '&Add'
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
00333377737FFFFF7733333033000000033333373377777773330000}
Layout = blGlyphTop
NumGlyphs = 2
ParentShowHint = False
ShowHint = False
OnClick = AddBClick
end
object EditB: TSpeedButton
Left = 33
Top = 0
Width = 33
Height = 41
Caption = '&Edit'
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
555557777F777555F55500000000555055557777777755F75555005500055055
555577F5777F57555555005550055555555577FF577F5FF55555500550050055
5555577FF77577FF555555005050110555555577F757777FF555555505099910
555555FF75777777FF555005550999910555577F5F77777775F5500505509990
3055577F75F77777575F55005055090B030555775755777575755555555550B0
B03055555F555757575755550555550B0B335555755555757555555555555550
BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
50BB555555555555575F555555555555550B55555555555555750000}
Layout = blGlyphTop
NumGlyphs = 2
ParentShowHint = False
ShowHint = False
OnClick = EditBClick
end
object DeleteB: TSpeedButton
Left = 66
Top = 0
Width = 49
Height = 41
Caption = '&Remove'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333303
333333333333337FF3333333333333903333333333333377FF33333333333399
03333FFFFFFFFF777FF3000000999999903377777777777777FF0FFFF0999999
99037F3337777777777F0FFFF099999999907F3FF777777777770F00F0999999
99037F773777777777730FFFF099999990337F3FF777777777330F00FFFFF099
03337F773333377773330FFFFFFFF09033337F3FF3FFF77733330F00F0000003
33337F773777777333330FFFF0FF033333337F3FF7F3733333330F08F0F03333
33337F7737F7333333330FFFF003333333337FFFF77333333333000000333333
3333777777333333333333333333333333333333333333333333}
Layout = blGlyphTop
NumGlyphs = 2
ParentShowHint = False
ShowHint = False
Visible = False
OnClick = DeleteBClick
end
object MoveB: TSpeedButton
Left = 115
Top = 0
Width = 33
Height = 41
AllowAllUp = True
GroupIndex = 1
Caption = '&Move'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333FF3333333333333003333333333333377F33333333333307
733333FFF333337773333C003333307733333777FF333777FFFFC0CC03330770
000077777FF377777777C033C03077FFFFF077FF77F777FFFFF7CC00000F7777
777077777777777777773CCCCC00000000003777777777777777333330030FFF
FFF03333F77F7F3FF3F7333C0C030F00F0F03337777F7F77373733C03C030FFF
FFF03377F77F7F3F333733C03C030F0FFFF03377F7737F733FF733C000330FFF
0000337777F37F3F7777333CCC330F0F0FF0333777337F737F37333333330FFF
0F03333333337FFF7F7333333333000000333333333377777733}
Layout = blGlyphTop
NumGlyphs = 2
ParentShowHint = False
ShowHint = False
Visible = False
OnClick = MoveBClick
end
object Image1: TImage
Left = 280
Top = 0
Width = 10
Height = 10
Picture.Data = {<image001.bmp>}
Visible = False
end
object PickB: TBitBtn
Left = 181
Top = 0
Width = 33
Height = 41
Caption = '&Pick'
Default = True
ParentShowHint = False
ShowHint = False
TabOrder = 0
Visible = False
OnClick = PickBClick
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333033333
33333333373F33333333333330B03333333333337F7F33333333333330F03333
333333337F7FF3333333333330B00333333333337F773FF33333333330F0F003
333333337F7F773F3333333330B0B0B0333333337F7F7F7F3333333300F0F0F0
333333377F73737F33333330B0BFBFB03333337F7F33337F33333330F0FBFBF0
3333337F7333337F33333330BFBFBFB033333373F3333373333333330BFBFB03
33333337FFFFF7FF3333333300000000333333377777777F333333330EEEEEE0
33333337FFFFFF7FF3333333000000000333333777777777F33333330000000B
03333337777777F7F333333300000000033333377777777733330000}
Layout = blGlyphTop
NumGlyphs = 2
end
object DoneB: TBitBtn
Left = 214
Top = 0
Width = 33
Height = 41
Cancel = True
Caption = '&Done'
ParentShowHint = False
ShowHint = False
TabOrder = 1
Visible = False
OnClick = DoneBClick
Glyph.Data = {
78010000424D7801000000000000760000002800000020000000100000000100
04000000000000000000120B0000120B00000000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033BBBBBBBBBB
BB33337777777777777F33BB00BBBBBBBB33337F77333333F37F33BB0BBBBBB0
BB33337F73F33337FF7F33BBB0BBBB000B33337F37FF3377737F33BBB00BB00B
BB33337F377F3773337F33BBBB0B00BBBB33337F337F7733337F33BBBB000BBB
BB33337F33777F33337F33EEEE000EEEEE33337F3F777FFF337F33EE0E80000E
EE33337F73F77773337F33EEE0800EEEEE33337F37377F33337F33EEEE000EEE
EE33337F33777F33337F33EEEEE00EEEEE33337F33377FF3337F33EEEEEE00EE
EE33337F333377F3337F33EEEEEE00EEEE33337F33337733337F33EEEEEEEEEE
EE33337FFFFFFFFFFF7F33EEEEEEEEEEEE3333777777777777730000}
Layout = blGlyphTop
NumGlyphs = 2
end
object UsingB: TBitBtn
Left = 247
Top = 0
Width = 33
Height = 41
Caption = 'Ho&w'
ParentShowHint = False
ShowHint = False
TabOrder = 2
Visible = False
OnClick = UsingBClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333CCCCC33
33333FFFF88888FFFFFFCCCCCC707CCCCCC3888888F8F888888F007777080777
7003888888888888888F0F0880F8F0880F0383F33338F333338380BFBFB8BFBF
B08338F33338F33338F380FBFB99FBFBF08338F33388F33338F330BFBF99BFBF
B033383F338833333833380BFBF8FBFB0833338F333FF3338F33380FBF97BFBF
0833338F3388FF338F33330BFB990BFB03333383FF888FFF8333333000399000
33333338883888883333333333339933333333333FF388F33333333399339933
3333333388F388F333333333993399333333333388FF88333333333339999333
3333333338888333333333333333333333333333333333333333}
Layout = blGlyphTop
NumGlyphs = 2
end
end
object Panel2: TPanel
Left = 0
Top = 107
Width = 367
Height = 32
Align = alBottom
TabOrder = 2
Visible = False
object Label1: TLabel
Left = 1
Top = 1
Width = 365
Height = 30
Align = alClient
Caption =
'Use arrow keys to move item to a new position and press Enter, o' +
'r use mouse to drag item to a new position.'
Color = clYellow
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
WordWrap = True
end
end
end